home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / RTGMaster / demos / network / TCPClient.c < prev    next >
Encoding:
C/C++ Source or Header  |  1998-06-24  |  1.1 KB  |  44 lines
  1. #include <clib/exec_protos.h>
  2. #include <pragmas/exec_pragmas.h>
  3. #include <stdio.h>
  4. #include <strings.h>
  5. #include <clib/rtgextra_protos.h>
  6. #include <pragmas/rtgextra_pragmas.h>
  7. #include <rtgmaster/rtgtcpip.h>
  8. #include <clib/dos_protos.h>
  9.  
  10. struct Library *SocketBase=0;
  11. struct Library *RTGExtraBase=0;
  12.  
  13. void makeservaddr(struct sockaddr_in *address, char *host, int port);
  14. struct RTG_Socket *LIBOpenClient(char *host, struct Library *SBase, int port, int mode, int protocol);
  15. struct RTG_Socket rs;
  16.  
  17. void main()
  18. {
  19.  struct RTG_Socket *s;
  20.  if (RTGExtraBase=OpenLibrary("rtgextra.library",0))
  21.  {
  22.   if (SocketBase=OpenLibrary("bsdsocket.library",4))
  23.   {
  24.    int i;
  25.    long mode=1;
  26.    char buf[1024];
  27.    char buf2[1024];
  28.    char *strings[]={"Nur","ein","Test",NULL};
  29.    s=OpenClient(SocketBase,"194.55.101.26",3050,SOCK_STREAM,0);
  30.    RtgIoctl(SocketBase,s,&mode);
  31.    while(1)
  32.    {
  33.     if (RtgRecv(SocketBase,s,buf,0,25)>0)
  34.      printf("%s\n",buf);
  35.      sprintf(buf2,"Message from Socket ",s->s);
  36.     RtgSend(SocketBase,s,buf2,0,strlen(buf2)+1);
  37.    }
  38.    CloseLibrary(SocketBase);
  39.    CloseLibrary(RTGExtraBase);
  40.   }
  41.  }
  42. }
  43.  
  44.